﻿Public Class BootModes

    Private Sub BootModes_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim pop As Point = MousePosition
        pop.X = pop.X - 20
        pop.Y = pop.Y - 20
        Me.Location = pop
    End Sub

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Dim secondform As New Diagnostics
        secondform.panelsize = "connect1"
        secondform.Show()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Close()
    End Sub
End Class